inherited frmCashDaily: TfrmCashDaily
  Left = 281
  Top = 136
  Caption = #20986#32435#26085#35760#36134
  PixelsPerInch = 96
  TextHeight = 12
  inherited Panel1: TPanel
    Top = 41
    ExplicitTop = 41
    inherited img3: TImage
      Left = 267
      ExplicitLeft = 267
    end
    inherited btnFilter: TcxButton [1]
      TabOrder = 5
      Visible = False
    end
    inherited edtFilter: TcxTextEdit [2]
      Visible = False
    end
    inherited labFuncName: TcxLabel [3]
      Left = 13
      Top = 9
      Caption = #20986#32435#24080#25143
      Style.IsFontAssigned = True
      Visible = True
      ExplicitLeft = 13
      ExplicitTop = 9
      ExplicitWidth = 52
    end
    inherited labFuncDesc: TcxLabel [4]
      Left = 213
      Top = 9
      Style.IsFontAssigned = True
      ExplicitLeft = 213
      ExplicitTop = 9
    end
    inherited dfCash: TFrameSetDateFilter
      Left = 369
      ExplicitLeft = 369
      inherited cxLabel2: TcxLabel
        Style.IsFontAssigned = True
      end
      inherited cxLabel3: TcxLabel
        Style.IsFontAssigned = True
      end
      inherited cxLabel4: TcxLabel
        Style.IsFontAssigned = True
      end
    end
    object edtAccountID: TcxDBLookupComboBox
      Tag = 16
      Left = 63
      Top = 7
      DataBinding.DataField = 'accountid'
      DataBinding.DataSource = dsAccount
      Properties.ListColumns = <>
      TabOrder = 3
      Width = 145
    end
    object btnRefreshPnl: TcxButton
      Left = 725
      Top = 5
      Width = 75
      Height = 25
      Action = actRefresh
      Anchors = [akTop, akRight]
      TabOrder = 6
    end
  end
  inherited pnlMain: TPanel
    Top = 86
    Height = 291
    ExplicitTop = 86
    ExplicitHeight = 291
    inherited MainDataGrid: TcxGrid
      Height = 291
      ExplicitHeight = 291
      inherited MainDataGridDBTableView: TcxGridDBTableView
        DataController.DataSource = dsDaybook
        DataController.Summary.FooterSummaryItems = <
          item
            Kind = skSum
            Column = colBalance
          end
          item
            Kind = skSum
            Column = colcreditamt
          end
          item
            Kind = skSum
            Column = coldcbalance
          end
          item
            Kind = skSum
            Column = coldccreditamt
          end
          item
            Kind = skSum
            Column = coldcdebitamt
          end
          item
            Kind = skSum
            Column = coldebitamt
          end
          item
            Kind = skCount
            Column = colbookdate
          end>
        OptionsView.ColumnAutoWidth = True
        object colbookdate: TcxGridDBColumn
          Caption = #26085#26399
          DataBinding.FieldName = 'bookdate'
          HeaderAlignmentHorz = taCenter
          Width = 80
        end
        object colvoucherno: TcxGridDBColumn
          Caption = #20973#35777#23383#21495
          DataBinding.FieldName = 'vouwordtype'
          HeaderAlignmentHorz = taCenter
          Width = 60
        end
        object colexplan: TcxGridDBColumn
          Caption = #25688#35201
          DataBinding.FieldName = 'explan'
          HeaderAlignmentHorz = taCenter
          Width = 80
        end
        object colsubjectcode: TcxGridDBColumn
          Caption = #23545#26041#31185#30446
          DataBinding.FieldName = 'subjectcode'
          HeaderAlignmentHorz = taCenter
          Width = 80
        end
        object coltakeman: TcxGridDBColumn
          Caption = #32463#25163#20154
          DataBinding.FieldName = 'takeman'
          HeaderAlignmentHorz = taCenter
          Width = 80
        end
        object coldebitamt: TcxGridDBColumn
          Caption = #20511#26041
          DataBinding.FieldName = 'debitamt'
          HeaderAlignmentHorz = taCenter
          Width = 70
        end
        object colcreditamt: TcxGridDBColumn
          Caption = #36151#26041
          DataBinding.FieldName = 'creditamt'
          HeaderAlignmentHorz = taCenter
          Width = 70
        end
        object coldodebit: TcxGridDBColumn
          Caption = #26041#21521
          DataBinding.FieldName = 'dodebit'
          PropertiesClassName = 'TcxTextEditProperties'
          HeaderAlignmentHorz = taCenter
          Width = 30
        end
        object colBalance: TcxGridDBColumn
          Caption = #20313#39069
          DataBinding.FieldName = 'Balance'
          HeaderAlignmentHorz = taCenter
          Width = 70
        end
        object coldcdebitamt: TcxGridDBColumn
          Caption = #20511#26041#26412#24065
          DataBinding.FieldName = 'dcdebitamt'
          Visible = False
          HeaderAlignmentHorz = taCenter
          Width = 70
        end
        object coldccreditamt: TcxGridDBColumn
          Caption = #36151#26041#26412#24065
          DataBinding.FieldName = 'dccreditamt'
          Visible = False
          HeaderAlignmentHorz = taCenter
          Width = 70
        end
        object coldcbalance: TcxGridDBColumn
          Caption = #20313#39069#26412#24065
          DataBinding.FieldName = 'dcbalance'
          Visible = False
          HeaderAlignmentHorz = taCenter
          Width = 70
        end
      end
    end
  end
  inherited ToolBar: TToolBar
    Height = 41
    Transparent = True
    ExplicitWidth = 809
    ExplicitHeight = 41
    inherited btnPrior: TToolButton
      Top = 0
      ExplicitTop = 0
    end
    inherited btnNext: TToolButton
      Top = 0
      ExplicitTop = 0
    end
    inherited btnSp1: TToolButton
      Top = 0
      ExplicitTop = 0
    end
    inherited btnAppend: TToolButton
      Top = 0
      ExplicitTop = 0
    end
    inherited btnEdit: TToolButton
      Top = 0
      ExplicitTop = 0
    end
    inherited btnDelete: TToolButton
      Top = 0
      ExplicitTop = 0
    end
    inherited btnSp2: TToolButton
      Top = 0
      ExplicitTop = 0
    end
    inherited btnImport: TToolButton
      Top = 0
      OnClick = btnImportClick
      ExplicitTop = 0
    end
    inherited btnRefresh: TToolButton
      Top = 0
      Caption = #21047#26032' &R'
      ImageIndex = 5
      ExplicitTop = 0
    end
    inherited btnSp3: TToolButton
      Top = 0
      ExplicitTop = 0
    end
    inherited btnCancel: TToolButton
      Top = 0
      ImageIndex = 37
      ExplicitTop = 0
    end
    object btnUnImport: TToolButton
      Left = 512
      Top = 0
      Caption = #21453#24341#20837
      ImageIndex = 40
      OnClick = btnUnImportClick
    end
    object btnImportBill: TToolButton
      Left = 573
      Top = 0
      Caption = #36827#38144#23384
      Grouped = True
      ImageIndex = 39
      OnClick = btnImportBillClick
    end
    object btnSP4: TToolButton
      Left = 634
      Top = 0
      Width = 8
      Caption = 'btnSP4'
      ImageIndex = 40
      Style = tbsSeparator
    end
  end
  inherited pnlBottom: TPanel
    inherited lblGroupSort: TcxLabel
      Style.IsFontAssigned = True
    end
    inherited edtPause: TcxComboBox
      Left = 698
      ExplicitLeft = 698
    end
    inherited chkGridFilter: TcxCheckBox
      Left = 625
      ExplicitLeft = 625
    end
  end
  inherited MainMenu1: TMainMenu
    Top = 84
  end
  inherited MainDataSetU: TUniQuery
    SQLInsert.Strings = (
      'INSERT INTO tft_cashDayBook'
      
        '  (daybookid, accountid, filid, create_by, balanceid, bookdate, ' +
        'vouwordid, voucherno, tax, debitamt, creditamt, dcdebitamt, dccr' +
        'editamt, billno, explan, subjectcode, takeman, accflag, bankflag' +
        ', balancedate, initflag, sourceflag, bankcheckday, acccheckday, ' +
        'dodebit, moneyid)'
      'VALUES'
      
        '  (:daybookid, :accountid, :filid, :create_by, :balanceid, :book' +
        'date, :vouwordid, :voucherno, :tax, :debitamt, :creditamt, :dcde' +
        'bitamt, :dccreditamt, :billno, :explan, :subjectcode, :takeman, ' +
        ':accflag, :bankflag, :balancedate, :initflag, :sourceflag, :bank' +
        'checkday, :acccheckday, :dodebit, :moneyid)')
    SQLDelete.Strings = (
      'DELETE FROM tft_cashDayBook'
      'WHERE'
      '  daybookid = :Old_daybookid')
    SQLUpdate.Strings = (
      'UPDATE tft_cashDayBook'
      'SET'
      
        '  daybookid = :daybookid, accountid = :accountid, filid = :filid' +
        ', create_by = :create_by, balanceid = :balanceid, bookdate = :bo' +
        'okdate, vouwordid = :vouwordid, voucherno = :voucherno, tax = :t' +
        'ax, debitamt = :debitamt, creditamt = :creditamt, dcdebitamt = :' +
        'dcdebitamt, dccreditamt = :dccreditamt, billno = :billno, explan' +
        ' = :explan, subjectcode = :subjectcode, takeman = :takeman, accf' +
        'lag = :accflag, bankflag = :bankflag, balancedate = :balancedate' +
        ', initflag = :initflag, sourceflag = :sourceflag, bankcheckday =' +
        ' :bankcheckday, acccheckday = :acccheckday, dodebit = :dodebit, ' +
        'moneyid = :moneyid'
      'WHERE'
      '  daybookid = :Old_daybookid')
    SQLLock.Strings = (
      'SELECT * FROM tft_cashDayBook'
      'WITH (UPDLOCK, ROWLOCK, HOLDLOCK)'
      'WHERE'
      '  daybookid = :Old_daybookid')
    SQLRefresh.Strings = (
      
        'SELECT daybookid, accountid, create_by, balanceid, bookdate, vou' +
        'wordid, voucherno, tax, debitamt, creditamt, dcdebitamt, dccredi' +
        'tamt, billno, explan, subjectcode, takeman, accflag, bankflag, b' +
        'alancedate, initflag, sourceflag, dodebit FROM tft_cashDayBook'
      'WHERE'
      '  daybookid = :Old_daybookid')
    SQL.Strings = (
      'select m.daybookid,m.explan,m.bookdate,m.balanceid,'
      'm.balancedate,m.billno,m.takeman,m.bankcheckday,m.acccheckday,'
      'm.creditamt,m.debitamt,m.create_by,m.Accountid,'
      'm.ACCFLAG,m.BANKFLAG,m.INITFLAG,m.voucherno,m.dodebit,'
      'm.vouwordid,m.SUBJECTCODE,m.SOURCEFLAG,m.tax,'
      'b.NAME+'#39'-'#39'+cast(m.voucherno as varchar(100)) AS vouwordtype,'
      'm.dcDebitamt, '
      'm.dcCreditamt,'
      '0.00 as Balance,0.00 AS dcBalance'
      '  from tft_cashDayBook m '
      '  left outer join tfd_vouword B on m.vouwordid=B.ID '
      '  where m.Accountid=:accountid AND m.InitFlag=:initflag'
      '  order by m.bookdate,m.daybookid')
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'accountid'
        Value = nil
      end
      item
        DataType = ftUnknown
        Name = 'initflag'
        Value = nil
      end>
  end
  object cdsAccount: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 304
    Top = 81
    object cdsAccountaccountid: TIntegerField
      FieldName = 'accountid'
      OnChange = cdsAccountaccountidChange
    end
  end
  object dsAccount: TDataSource
    DataSet = cdsAccount
    Left = 360
    Top = 97
  end
  object cdsDaybook: TClientDataSet
    Aggregates = <>
    Params = <>
    AfterScroll = cdsDaybookAfterScroll
    Left = 244
    Top = 233
  end
  object dsDaybook: TDataSource
    DataSet = cdsDaybook
    Left = 300
    Top = 249
  end
end
